for a in *.tar
do    
    a_dir=`expr $a : '\(.*\).tar'`
    mkdir $a_dir
    tar -xvf $a -C $a_dir
done
